home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / memory / emsaw41s.zip / TEST1C.C < prev    next >
Text File  |  1994-06-26  |  623b  |  28 lines
  1. /* test1c.c */
  2.  
  3. #include <type400.c>
  4. #include <\tc\include\stdio.h>
  5.  
  6.     void main()
  7. {
  8. int A;
  9. long totsiz, avsiz, index, bitnu, length, val1, val2;
  10.     EMINIT ();
  11.     SIZAR (&totsiz, &avsiz);
  12.     printf("%8lu      %8lu\n",totsiz,avsiz);
  13.     NEWAR (&A, &avsiz);
  14.     index=avsiz;
  15.     val1=99999999L;
  16.     SETINT (&A, &index, &val1);
  17.     val2=GETINT (&A, &index);
  18.     printf("%8lu      %8lu\n",val1,val2);
  19.     index=avsiz-2;
  20.     bitnu=7;
  21.     length=30;
  22.     SETF (&A, &index, &bitnu, &length, &val1);
  23.     val2=GETF (&A, &index, &bitnu, &length);
  24.     printf("%8lu      %8lu\n",val1,val2);
  25.     FREEAR (&A);
  26.     printf("%8lu      %8lu\n", totsiz, avsiz);
  27. }
  28.